home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / programr / graphz11.zip / DEMO_SRC / GZDEMO.C next >
C/C++ Source or Header  |  1995-04-06  |  2KB  |  77 lines
  1. /**************************************************************/
  2. /* GraphZ.DLL demo program.                                   */
  3. /* Copyright ⌐ 1995, C. van Zwynsvoorde. All rights reserved. */
  4. /**************************************************************/
  5.  
  6. #include <windows.h>
  7. #include <math.h>
  8. #include "GraphZ.h"
  9. #define IDHELP 998
  10.  
  11. double values[4];
  12. double t;
  13. HWND hWndGraph;
  14. LPSTR lpszIniFile;
  15.  
  16. BOOL FAR PASCAL _export DemoDlgProc(HWND hWnd, WORD iMessage, WPARAM wParam, LPARAM lParam)
  17.     {
  18.     switch(iMessage)
  19.         {
  20.         case WM_INITDIALOG:
  21.             hWndGraph = GetDlgItem(hWnd, 101);
  22.             GZSetIni(hWndGraph, lpszIniFile);
  23.             GZLoadIni(hWndGraph);
  24.             SetTimer(hWnd, 1, 100, NULL);
  25.             return TRUE;
  26.  
  27.         case WM_TIMER:
  28.             t = GetTickCount() / 1000.0;
  29.             values[0] = 1.2 + sin(t);
  30.             values[1] = 1.2 + sin(t + M_PI_2);
  31.             values[2] = 1.2 + sin(t + M_PI);
  32.             values[3] = 1.2 + sin(t + M_PI + M_PI_2);
  33.  
  34.             GZAddPoints(hWndGraph, &values, 4);
  35.             return TRUE;
  36.  
  37.         case WM_DESTROY:
  38.             KillTimer(hWnd, 1);
  39.             return TRUE;
  40.  
  41.         case WM_COMMAND:
  42.             if (wParam == IDOK)
  43.                 EndDialog(hWnd, TRUE);
  44.             else if (wParam == IDHELP)
  45.                 {
  46.                 FARPROC lpfnHelpDialog;
  47.                 lpfnHelpDialog = MakeProcInstance((FARPROC)DemoDlgProc, GetWindowWord(hWnd, GWW_HINSTANCE));
  48.                 DialogBox(GetWindowWord(hWnd, GWW_HINSTANCE), "Help", NULL, lpfnHelpDialog);
  49.                 FreeProcInstance(lpfnHelpDialog);
  50.                 }
  51.             return TRUE;;
  52.         }
  53.     return FALSE;
  54.     }
  55.  
  56.  
  57.  
  58.  
  59. int PASCAL WinMain (HINSTANCE hInst, HINSTANCE hPrev, LPSTR lpszCmdLine, int nCmdShow)
  60.     {
  61.     FARPROC lpfnDemoDialog;
  62.     WORD hLib = LoadLibrary("GraphZ.DLL");
  63.     if (hLib < 32)
  64.         {
  65.         MessageBox(NULL, "You need GraphZ.DLL to run this demo.", "GraphZ Demo", MB_OK);
  66.         return -1;
  67.         }
  68.     lpfnDemoDialog = MakeProcInstance((FARPROC)DemoDlgProc, hInst);
  69.     lpszIniFile = ".\\demo1.grz";
  70.     DialogBox(hInst, "GraphZDemo", NULL, lpfnDemoDialog);
  71.     lpszIniFile = ".\\demo2.grz";
  72.     DialogBox(hInst, "GraphZDemo", NULL, lpfnDemoDialog);
  73.     FreeProcInstance(lpfnDemoDialog);
  74.     FreeLibrary(hLib);
  75.     return 0;
  76.     }
  77.